package com.demarc.pesquisas.infraestrutura.hibernate.type;

import java.io.Serializable;
import java.sql.PreparedStatement;
import java.sql.ResultSet;
import java.sql.SQLException;
import java.sql.Types;
import java.util.Properties;

import org.apache.commons.lang3.StringUtils;
import org.hibernate.HibernateException;
import org.hibernate.MappingException;
import org.hibernate.engine.spi.SessionImplementor;
import org.hibernate.usertype.ParameterizedType;
import org.hibernate.usertype.UserType;

import com.demarc.pesquisas.infraestrutura.util.enumeracao.IEnumeracaoComCodigoString;

/**
 * UserType String para Enumerações.
 * <p>
 * Tipo extendido do Hibernate para persistir constantes de Enumerações do tipo
 * varchar. <br>
 * Toda Enumeração que persistir deve implementar o método
 * <code>public int getDescricao()</code>.
 * 
 * @author ahdnc
 * 
 * @param <E>
 *            Tipo de enumeração que será persistido pela classe
 */
public class EnumCodigoStringUserType<E extends Enum<E>> implements UserType,
		ParameterizedType {

	/**
	 * SQL TYPES
	 */
	private static final int SQL_TYPE = Types.VARCHAR;
	private static final int[] SQL_TYPES = { SQL_TYPE };

	private Class<E> clazz;

	private Integer enumCharSize;

	/**
	 * {@inheritDoc}
	 */
	@Override
	@SuppressWarnings("unchecked")
	public void setParameterValues(Properties params) {
		String enumClassName = params.getProperty(HibernateTypes.ENUM_CLASS);
		String enumCharSize = params.getProperty(HibernateTypes.ENUM_CHAR_SIZE);
		if (enumClassName == null) {
			throw new MappingException("enumClassName parameter not specified");
		}
		if (StringUtils.isNumeric(enumCharSize)) {
			this.enumCharSize = Integer.valueOf(enumCharSize);
		}
		try {
			this.clazz = (Class<E>) Class.forName(enumClassName);
		} catch (java.lang.ClassNotFoundException e) {
			throw new MappingException("enumClass " + enumClassName
					+ " not found", e);
		}

	}

	/**
	 * {@inheritDoc}
	 */
	@Override
	public Object assemble(Serializable cache, Object owner)
			throws HibernateException {
		return cache;
	}

	/**
	 * {@inheritDoc}
	 */
	@Override
	public Object deepCopy(Object value) throws HibernateException {
		return value;
	}

	/**
	 * {@inheritDoc}
	 */
	@Override
	public Serializable disassemble(Object value) throws HibernateException {
		return (Serializable) value;
	}

	/**
	 * {@inheritDoc}
	 */
	@Override
	public boolean equals(Object x, Object y) throws HibernateException {
		if (x == y) { // NOPMD by deinf.dejalma - Implementação de
			// infra-estrutura. Nela é necessário avaliar se um
			// objeto é o mesmo (==) que outro.
			return true;
		}
		if (x == null || y == null) {
			return false;
		}
		return x.equals(y);
	}

	/**
	 * {@inheritDoc}
	 */
	@Override
	public int hashCode(Object x) throws HibernateException {
		return x.hashCode();
	}

	/**
	 * {@inheritDoc}
	 */
	@Override
	public boolean isMutable() {
		return false;
	}

	/**
	 * {@inheritDoc}
	 */
	@Override
	public Object nullSafeGet(ResultSet rs, String[] names,
			SessionImplementor session, Object owner)
			throws HibernateException, SQLException {
		String codigo = rs.getString(names[0]);
		IEnumeracaoComCodigoString enumObject = null;
		if (rs.wasNull()) {
		} else {
			enumObject = getEnum(codigo);
		}
		return enumObject;
	}

	/**
	 * Método que retorna a descrição das constantes.
	 * 
	 * @param codigo
	 * @return
	 */
	private IEnumeracaoComCodigoString getEnum(String codigo) {
		Class<? extends Enum<E>> enumClass = returnedClass();
		Enum<E>[] enums = enumClass.getEnumConstants();
		for (int i = 0; i < enums.length; i++) {
			if (((IEnumeracaoComCodigoString) enums[i]).getCodigo().trim()
					.equals(codigo.trim())) {
				return (IEnumeracaoComCodigoString) enums[i];
			}
		}
		return null;
	}

	/**
	 * {@inheritDoc}
	 */
	@Override
	public void nullSafeSet(PreparedStatement pstm, Object value, int index,
			SessionImplementor session) throws HibernateException, SQLException {
		if (value == null) {
			pstm.setNull(index, SQL_TYPE);
		} else {
			String codigoEnum = ((IEnumeracaoComCodigoString) value).getCodigo();
			if (enumCharSize != null) {
				codigoEnum = StringUtils.rightPad(codigoEnum, enumCharSize);
			}
			pstm.setString(index, codigoEnum);
		}
	}

	/**
	 * {@inheritDoc}
	 */
	@Override
	public Object replace(Object original, Object target, Object owner)
			throws HibernateException {
		return original;
	}

	/**
	 * {@inheritDoc}
	 */
	@Override
	public Class<E> returnedClass() {
		return clazz;
	}

	/**
	 * {@inheritDoc}
	 */
	@Override
	public int[] sqlTypes() {
		return SQL_TYPES.clone();
	}

}
